﻿Imports CustomTshirtFinal
Public Class Pedidos
    Inherits System.Web.UI.Page
    Protected Sub btnBuscar_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnBuscar.Click

        Dim negocio = New PedidoNegocio

        Dim lista = negocio.buscarPorFecha(Me.txtFecha.Text)

        dgPedidos.DataSource = lista
        dgPedidos.DataBind()




    End Sub

    Protected Sub btnNuevo_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnNuevo.Click
        Response.Redirect("~/PedidoNuevo.aspx", False)
    End Sub
End Class